home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2000 July / macformat-092.iso / MacFormat 92 CD / Shareware Plus / Utilities / FolderSynchronizer 1.8.9 / FoldersSynchronizer / FoldersSynchronizer.9 / AllScripts_31_ScrFMulti.ls < prev    next >
Encoding:
Text File  |  2000-05-10  |  910 b   |  33 lines
  1. on mouseDown me
  2.   global gArancio, gNero
  3.   set mySprite to the spriteNum of me
  4.   if the rollOver <> mySprite then
  5.     exit
  6.   end if
  7.   set myMember to the member of sprite mySprite
  8.   set myMouseL to the mouseLine
  9.   if myMouseL < 1 then
  10.     exit
  11.   end if
  12.   if the commandDown then
  13.     DoPopChain(the name of myMember, myMouseL)
  14.     dontPassEvent()
  15.     exit
  16.   end if
  17.   set myLastColor to the foreColor of line myMouseL of field myMember
  18.   repeat while the stillDown
  19.     if myMouseL = the mouseLine then
  20.       set the foreColor of line myMouseL of field myMember to gArancio
  21.     else
  22.       set the foreColor of line myMouseL of field myMember to myLastColor
  23.     end if
  24.     updateStage()
  25.   end repeat
  26.   set the foreColor of line myMouseL of field myMember to myLastColor
  27.   updateStage()
  28.   if myMouseL = the mouseLine then
  29.     set myName to the name of member myMember
  30.     VaiAlButton(myName, myMouseL)
  31.   end if
  32. end
  33.